home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / CRS / crs10.d81 / darkter4.arc / DT4.EQUATES (.txt) < prev    next >
Commodore BASIC  |  2009-10-10  |  4KB  |  204 lines
  1. 1000 REM * DARKTERM V4.0
  2. 1010 REM * (C) 1986 D.S.S.
  3. 1020 REM * TERMINAL EQUATES
  4. 1030 REM *
  5. 1040 OPEN2,9,1,"@0:T4.CODE"
  6. 1050 SYS700
  7. 1060 .OPT O2
  8. 1070 ;
  9. 1080 CHKIN  =$FFC6 ; KERNAL EQUATES
  10. 1090 CHKOUT =$FFC9
  11. 1100 CHRIN  =$FFCF
  12. 1110 CHROUT =$FFD2
  13. 1120 CLRCHN =$FFCC
  14. 1130 CLOSE  =$FFC3
  15. 1140 OPEN   =$FFC0
  16. 1150 SETLFS =$FFBA
  17. 1160 SETNAM =$FFBD
  18. 1170 GETIN  =$FFE4
  19. 1180 READST =$FFB7
  20. 1190 PLOT   =$FFF0
  21. 1200 ;
  22. 1210 BUFLO    =$4C00 ; BUFFER START
  23. 1220 AUTODIAL =$4600 ; A/D JUMP ADDR
  24. 1230 AANSWER  =$4603 ; A/A JUMP ADDR
  25. 1240 ONLINE   =$4606 ; OFF-HOOK ADDR
  26. 1250 OFFLINE  =$4609 ; ON-HOOK ADDR
  27. 1260 ;
  28. 1270 ; * ZERO PAGE VARIABLES
  29. 1280 ;
  30. 1290 DDEV    =2  ; DISK DEVICE #
  31. 1300 SCROFF  =3  ; SCREEN SUPPRESS FL
  32. 1310 MODOFF  =4  ; MODEM SUPPRESS FL
  33. 1320 MODE    =5  ; SCREEN EDITOR MODE
  34. 1330 QMODE   =6  ; QUOTE MODE ENABLE
  35. 1340 DUPLEX  =7  ; DUPLEX FL
  36. 1350 KFLAG   =8  ; FUNCTION KEY FL
  37. 1360 BFLAG   =9  ; BUFFER XMIT FL
  38. 1370 BUFOP   =10 ; BUFFER OPEN FL
  39. 1380 BUFFER  =11 ; BUFFER START ADDR
  40. 1390 BPT     =13 ; BUFFER POINTER
  41. 1400 INLEN   =15 ; INPUT BUFFER LENGTH
  42. 1410 KPT     =16 ; FUNCTION KEY POINTER
  43. 1420 TEXT    =18 ; MULTI-USE POINTER
  44. 1430 PPT     =20 ; PHONE DIR POINTER
  45. 1440 TPT     =22 ; TEMPORARY PTR
  46. 1450 PSA     =24 ; SCREEN PTR
  47. 1460 AA      =26 ; INTEGER WORK REGS
  48. 1470 MP      =28 ; FILE TRANSFER PTR
  49. 1480 ENTRY   =30 ; SCREEN SELECT CTR
  50. 1490 IKP     =31 ; IN-KEY POINTER
  51. 1500 IBP     =32 ; IN-BUFFER POINTER
  52. 1510 DECML   =34 ; DECIMAL RESULT STRNG
  53. 1520 LO      =39 ; MULTIPLY ROUTINE
  54. 1530 HI      =40 ; STORAGE
  55. 1540 SCRPTR  =41 ; SCREEN POINTER
  56. 1550 COLPTR  =43 ; COLOR RAM PTR
  57. 1560 ROW     =45 ; CURSOR ROW
  58. 1570 COL     =46 ; CURSOR COLUMN
  59. 1580 CHRSAV  =47 ; CHAR UNDER CURSOR
  60. 1590 COLSAV  =48 ; COLOR UNDER CURSOR
  61. 1600 RVSFLG  =49 ; INVERSE VIDEO FL
  62. 1610 SCRCODE =50 ; SCREEN CODE SAVE
  63. 1620 COLCODE =51 ; COLOR CODE SAVE
  64. 1630 SCLO    =52 ; SCREEN SCROLL PTRS
  65. 1640 SCHI    =53
  66. 1650 FUNCON  =54 ; COLOR FUNCTION FL
  67. 1660 STK     =55 ; TEMPORARY
  68. 1670 TCP     =56
  69. 1680 SELNUM  =58 ; PHONE #S SELECTED
  70. 1690 ;
  71. 1700 ; * SYSTEM INPUT BUFFER (80 BYTES)
  72. 1710 ;
  73. 1720 INBUFF  =60
  74. 1730 ;
  75. 1740 ; * SETUP FILE EQUATES
  76. 1750 ;
  77. 1760 MODSTR =820 ; MODEM FILE STRING
  78. 1770 FUNSTR =836 ; FUNCTION KEY FILE ST
  79. 1780 CHRSTR =852 ; CHARACTER SET STRING
  80. 1790 PROTO  =868 ; PROTOCOL USED
  81. 1800 PAGES  =869 ; DIRECTORY PAGES
  82. 1810 PDEV   =870 ; PRINTER DEVICE
  83. 1820 PSEC   =871 ; PRINTER SEC ADDRESS
  84. 1830 CLKOFF =872 ; KEYCLICK ENABLE
  85. 1840 CWAVE  =873 ;          WAVEFORM
  86. 1850 CFREQ  =874 ;          FREQUENCY
  87. 1860 BELOFF =875 ; BELL TONE STUFF
  88. 1870 BWAVE  =876
  89. 1880 BFREQ  =877
  90. 1890 DDELAY =878 ; PULSE DIAL DELAY
  91. 1900 CDELAY =880 ; CARRIER WAIT DELAY
  92. 1910 HDELAY =881 ; HANGUP DELAY
  93. 1920 SCC1   =882 ; SCREEN COLOR SAVE
  94. 1930 SCC2   =883
  95. 1940 SCC3   =884
  96. 1950 COMLOK =885 ; COMMAND LOCK FL
  97. 1960 COLLOK =886 ; COLOR MODE FL
  98. 1970 CAPLOK =887 ; UPPER CASE LOCK
  99. 1980 WRDLOK =888 ; WORD WRAP ENABLE
  100. 1990 LINEF  =889 ; LINE FEED STATUS
  101. 2000 NULLS  =890 ; NULLS
  102. 2010 XDELO  =891 ; TRANSMIT DELAY
  103. 2020 XDEHI  =892
  104. 2030 BAUD   =893 ; BAUD RATE
  105. 2040 SBITS  =895 ; STOP BITS
  106. 2050 WRDLEN =896 ; WORD LENGTH
  107. 2060 PARITY =897 ; PARITY
  108. 2070 BSPEED =898 ; BUFFER SPEED
  109. 2080 CARCHK =899 ; CARRIER CHECK
  110. 2090 ;
  111. 2100 ; * SCREEN SWAP EDITOR SAVE REGS
  112. 2110 ;
  113. 2120 XRVSFLG =980
  114. 2130 XFUNCON =981
  115. 2140 XCHRSAV =982
  116. 2150 XCOLSAV =983
  117. 2160 XROW =984
  118. 2170 XCOL =985
  119. 2180 ;
  120. 2190 ; * START OF GENERAL VARIABLES
  121. 2200 ;
  122. 2210 *=$600
  123. 2220 DSKBUF *=*+80
  124. 2230 NUMTAB *=*+32
  125. 2240 PA .BYT 0
  126. 2250 PX .BYT 0
  127. 2260 PY .BYT 0
  128. 2270 MDA .BYT 0
  129. 2280 MDAA .BYT 0
  130. 2290 MDC .BYT 0
  131. 2300 MDX .BYT 0
  132. 2310 MDY .BYT 0
  133. 2320 IDX .BYT 0
  134. 2330 KEYNUM .BYT 0
  135. 2340 DCBR .BYT 0
  136. 2350 LOWK .BYT 0
  137. 2360 HIWK .BYT 0
  138. 2370 LOWK2 .BYT 0
  139. 2380 HIWK2 .BYT 0
  140. 2390 LORK2 .BYT 0
  141. 2400 HIRK2 .BYT 0
  142. 2410 DECLM .BYT 0,0,0,0,0
  143. 2420 WAITLEN .BYT 0
  144. 2430 RC .BYT 0,0
  145. 2440 P .BYT 0,0,0
  146. 2450 S .BYT 0,0,0
  147. 2460 X .BYT 0,0,0
  148. 2470 Y .BYT 0,0,0
  149. 2480 Q .BYT 0,0,0
  150. 2490 R .BYT 0,0,0
  151. 2500 KA .BYT 0
  152. 2510 KX .BYT 0
  153. 2520 KY .BYT 0
  154. 2530 MAXLEN .BYT 0
  155. 2540 PCLR .BYT 0
  156. 2550 PROW .BYT 0
  157. 2560 PCOL .BYT 0
  158. 2570 WRAP .BYT 0
  159. 2580 WLEN .BYT 0
  160. 2590 WTEXT *=*+40
  161. 2600 WCOLR *=*+40
  162. 2610 SDSTR *=*+25
  163. 2620 LDSTR *=*+32
  164. 2630 SIZE .BYT 0,0
  165. 2640 DMODE .BYT 0
  166. 2650 FILES .BYT 0
  167. 2660 PUA .BYT 0
  168. 2670 PUX .BYT 0
  169. 2680 PUY .BYT 0
  170. 2690 PAGEN .BYT 0
  171. 2700 CURNUM .BYT 0
  172. 2710 PTMP .BYT 0
  173. 2720 TRYS .BYT 0,0
  174. 2730 NCT .BYT 0
  175. 2740 PSTR *=*+27
  176. 2750 MULMOD .BYT 0
  177. 2760 T659 .BYT 0
  178. 2770 BB .BYT 0,0
  179. 2780 BC .BYT 0,0
  180. 2790 FC .BYT 0
  181. 2800 II .BYT 0
  182. 2810 PSCR .BYT 0
  183. 2820 NOTALL .BYT 0
  184. 2830 LSTBLK .BYT 0
  185. 2840 DSKLEN .BYT 0
  186. 2850 OUTDEV .BYT 0
  187. 2860 SVC1 .BYT 0
  188. 2870 SVC2 .BYT 0
  189. 2880 SVC3 .BYT 0
  190. 2890 EXLINE .BYT 0,0
  191. 2900 SLINE .BYT 0,0
  192. 2910 ELINE .BYT 0,0
  193. 2920 AFLAG .BYT 0
  194. 2930 SCA .BYT 0
  195. 2940 SCX .BYT 0
  196. 2950 SCY .BYT 0
  197. 2960 SAVX .BYT 0
  198. 2970 SAVY .BYT 0
  199. 2980 SAVZ .BYT 0
  200. 2990 RETFLG .BYT 0
  201. 3000 *=$800
  202. 3010 QUOSCR =* ; QUOTE MODE SCREEN CODES
  203. 3020 .FIL 8,"0:TERM4.SRC1"
  204.